(RETURN_UNGCPRO): Use if (1) .. else, not do ... while (0).

diff --git a/src/lisp.h b/src/lisp.h
index c2a06e4eb075f714cad0250ead8cc88b29d1ec28..8fbc5345d32f93494de133242bd0e2061fdd18a1 100644 (file)
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -1095,14 +1095,14 @@ void staticpro();
 
 /* Evaluate expr, UNGCPRO, and then return the value of expr.  */
 #define RETURN_UNGCPRO(expr)                   \
-do                                             \
+if (1)                                         \
     {                                          \
       Lisp_Object ret_ungc_val;                        \
       ret_ungc_val = (expr);                   \
       UNGCPRO;                                 \
       return ret_ungc_val;                     \
     }                                          \
-while (1)
+else
 \f
 /* Defined in data.c */
 extern Lisp_Object Qnil, Qt, Qquote, Qlambda, Qsubr, Qunbound;